! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
! 
! Sparse Jacobian Data Structures File
! 
! Generated by KPP-2.2.4_gc symbolic chemistry Kinetics PreProcessor
!       (http://www.cs.vt.edu/~asandu/Software/KPP)
! KPP is distributed under GPL, the general public licence
!       (http://www.gnu.org/copyleft/gpl.html)
! (C) 1995-1997, V. Damian & A. Sandu, CGRER, Univ. Iowa
! (C) 1997-2005, A. Sandu, Michigan Tech, Virginia Tech
!     With important contributions from:
!        M. Damian, Villanova University, USA
!        R. Sander, Max-Planck Institute for Chemistry, Mainz, Germany
! 
! File                 : gckpp_JacobianSP.f90
! Time                 : Fri Jan  4 10:37:04 2019
! Working directory    : /n/home05/msulprizio/GC/Code.Dev/KPP/Standard
! Equation file        : gckpp.kpp
! Output root filename : gckpp
! 
! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



MODULE gckpp_JacobianSP

  PUBLIC
  SAVE


! Sparse Jacobian Data


  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_0 = (/ &
       1,  2,  3,  4,  4,  4,  4,  4,  5,  5,  5,  5, & ! index 1 - 12
       5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5, & ! index 13 - 24
       5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5, & ! index 25 - 36
       5,  5,  6,  6,  6,  7,  7,  7,  7,  7,  7,  7, & ! index 37 - 48
       7,  8,  8,  8,  8,  8,  8,  8,  8,  9,  9, 10, & ! index 49 - 60
      10, 10, 10, 10, 10, 10, 10, 10, 11, 11, 11, 12, & ! index 61 - 72
      12, 12, 13, 13, 13, 14, 14, 14, 15, 15, 15, 16, & ! index 73 - 84
      16, 16, 17, 17, 18, 18, 18, 18, 18, 19, 19, 19, & ! index 85 - 96
      20, 20, 20, 21, 21, 21, 22, 22, 22, 23, 23, 24, & ! index 97 - 108
      24, 25, 25, 26, 26, 26, 26, 27, 27, 28, 28, 28, & ! index 109 - 120
      29, 29, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 121 - 132
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 133 - 144
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 145 - 156
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 157 - 168
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 169 - 180
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 31, & ! index 181 - 192
      31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, & ! index 193 - 204
      31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, & ! index 205 - 216
      31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, & ! index 217 - 228
      31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, & ! index 229 - 240
      31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, & ! index 241 - 252
      31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, & ! index 253 - 264
      31, 31, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, & ! index 265 - 276
      32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, & ! index 277 - 288
      32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, & ! index 289 - 300
      32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, & ! index 301 - 312
      32, 32, 32, 32, 33, 33, 33, 33, 33, 33, 33, 33, & ! index 313 - 324
      33, 33, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, & ! index 325 - 336
      35, 35, 35, 35, 35, 36, 36, 36, 36, 36, 36, 36, & ! index 337 - 348
      36, 36, 36, 36, 36, 36, 36, 36, 37, 37, 38, 38 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_1 = (/ &
      38, 38, 39, 39, 40, 40, 41, 41, 41, 41, 42, 42, & ! index 361 - 372
      43, 43, 44, 44, 45, 45, 46, 46, 47, 47, 47, 48, & ! index 373 - 384
      48, 48, 49, 49, 49, 50, 50, 51, 51, 51, 52, 52, & ! index 385 - 396
      53, 53, 54, 54, 55, 55, 56, 56, 57, 57, 58, 58, & ! index 397 - 408
      59, 59, 59, 59, 60, 60, 60, 60, 61, 61, 61, 62, & ! index 409 - 420
      62, 62, 62, 63, 63, 63, 63, 63, 64, 64, 64, 64, & ! index 421 - 432
      64, 65, 65, 65, 65, 65, 66, 66, 66, 66, 66, 67, & ! index 433 - 444
      67, 67, 67, 67, 67, 67, 67, 67, 67, 68, 68, 68, & ! index 445 - 456
      69, 69, 69, 70, 70, 70, 70, 70, 71, 71, 71, 71, & ! index 457 - 468
      72, 72, 72, 72, 73, 73, 73, 74, 74, 74, 74, 74, & ! index 469 - 480
      74, 75, 75, 75, 76, 76, 76, 76, 76, 76, 77, 77, & ! index 481 - 492
      77, 78, 78, 78, 79, 79, 79, 80, 80, 80, 81, 81, & ! index 493 - 504
      81, 81, 82, 82, 82, 83, 83, 83, 83, 84, 84, 84, & ! index 505 - 516
      85, 85, 85, 86, 86, 86, 87, 87, 87, 88, 88, 88, & ! index 517 - 528
      88, 88, 88, 88, 89, 89, 89, 89, 90, 90, 90, 90, & ! index 529 - 540
      91, 91, 91, 92, 92, 92, 93, 93, 93, 94, 94, 94, & ! index 541 - 552
      95, 95, 95, 95, 96, 96, 96, 96, 96, 96, 96, 97, & ! index 553 - 564
      97, 97, 97, 97, 97, 98, 98, 98, 98, 98, 99, 99, & ! index 565 - 576
      99, 99, 99,100,100,100,100,100,101,101,101,101, & ! index 577 - 588
     102,102,102,102,103,103,103,103,103,103,103,103, & ! index 589 - 600
     103,103,104,104,104,104,105,105,105,105,105,106, & ! index 601 - 612
     106,106,106,106,106,107,107,107,108,108,108,108, & ! index 613 - 624
     108,108,108,108,108,108,108,109,109,109,109,110, & ! index 625 - 636
     110,110,110,111,111,111,111,111,112,112,112,112, & ! index 637 - 648
     113,113,113,113,113,113,114,114,114,114,115,115, & ! index 649 - 660
     115,115,115,116,116,116,116,116,116,116,116,116, & ! index 661 - 672
     117,117,117,117,117,118,118,118,118,118,118,119, & ! index 673 - 684
     119,119,119,119,119,120,120,120,120,120,120,120, & ! index 685 - 696
     121,121,121,121,122,122,122,122,122,123,123,123, & ! index 697 - 708
     123,123,124,124,124,124,124,125,125,125,125,125 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_2 = (/ &
     126,126,126,126,126,126,126,127,127,127,127,127, & ! index 721 - 732
     127,128,128,128,128,129,129,129,129,130,130,130, & ! index 733 - 744
     130,130,130,130,131,131,131,131,131,131,131,132, & ! index 745 - 756
     132,132,132,132,133,133,133,133,133,133,134,134, & ! index 757 - 768
     134,134,135,135,135,135,136,136,136,136,136,137, & ! index 769 - 780
     137,137,137,137,138,138,138,138,138,138,139,139, & ! index 781 - 792
     139,139,139,139,139,139,140,140,140,140,140,141, & ! index 793 - 804
     141,141,141,141,141,141,142,142,142,142,143,143, & ! index 805 - 816
     143,143,143,143,143,143,143,143,143,144,144,144, & ! index 817 - 828
     144,144,144,145,145,145,145,145,145,145,146,146, & ! index 829 - 840
     146,146,146,146,146,146,146,146,146,146,146,146, & ! index 841 - 852
     146,146,146,146,147,147,147,147,147,147,147,147, & ! index 853 - 864
     147,147,148,148,148,148,148,148,148,148,148,148, & ! index 865 - 876
     149,149,149,149,149,149,149,149,149,149,149,150, & ! index 877 - 888
     150,150,150,150,151,151,151,151,151,151,151,152, & ! index 889 - 900
     152,152,152,152,152,153,153,153,153,153,153,153, & ! index 901 - 912
     153,154,154,154,154,154,154,155,155,155,155,155, & ! index 913 - 924
     155,155,155,156,156,156,156,156,156,156,156,157, & ! index 925 - 936
     157,157,157,157,157,157,157,157,157,157,157,157, & ! index 937 - 948
     157,158,158,158,158,158,158,158,158,158,158,158, & ! index 949 - 960
     158,158,158,158,158,158,158,158,158,158,158,158, & ! index 961 - 972
     158,159,159,159,159,159,159,159,159,159,159,160, & ! index 973 - 984
     160,160,160,160,160,160,160,160,161,161,161,161, & ! index 985 - 996
     161,161,161,161,161,162,162,162,162,162,162,162, & ! index 997 - 1008
     162,162,162,162,162,163,163,163,163,163,163,163, & ! index 1009 - 1020
     163,164,164,164,164,164,164,164,164,164,164,164, & ! index 1021 - 1032
     164,165,165,165,165,165,165,165,165,165,165,165, & ! index 1033 - 1044
     165,165,165,165,165,165,165,165,165,166,166,166, & ! index 1045 - 1056
     166,166,166,166,167,167,167,167,167,167,167,168, & ! index 1057 - 1068
     168,168,168,168,168,168,168,168,168,169,169,169 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_3 = (/ &
     169,169,169,169,170,170,170,170,170,170,170,170, & ! index 1081 - 1092
     170,170,170,170,170,170,170,170,170,170,170,170, & ! index 1093 - 1104
     170,170,170,170,171,171,171,171,171,171,171,171, & ! index 1105 - 1116
     171,171,171,171,172,172,172,172,172,172,172,172, & ! index 1117 - 1128
     173,173,173,173,173,173,173,173,173,173,173,174, & ! index 1129 - 1140
     174,174,174,174,175,175,175,175,175,175,175,175, & ! index 1141 - 1152
     175,175,175,176,176,176,176,176,176,176,176,176, & ! index 1153 - 1164
     176,176,176,176,176,176,176,176,176,176,176,176, & ! index 1165 - 1176
     176,176,176,176,176,176,177,177,177,177,177,177, & ! index 1177 - 1188
     177,177,177,177,177,178,178,178,178,178,178,178, & ! index 1189 - 1200
     178,178,178,178,178,178,178,178,178,178,178,178, & ! index 1201 - 1212
     178,178,178,178,178,179,179,179,179,179,179,179, & ! index 1213 - 1224
     179,179,179,179,179,179,179,179,180,180,180,180, & ! index 1225 - 1236
     180,180,180,180,180,181,181,181,181,181,181,181, & ! index 1237 - 1248
     181,181,181,181,182,182,182,182,182,182,182,182, & ! index 1249 - 1260
     182,182,182,182,183,183,183,183,183,183,183,183, & ! index 1261 - 1272
     183,183,183,183,184,184,184,184,184,184,184,184, & ! index 1273 - 1284
     184,184,184,184,184,184,184,184,185,185,185,185, & ! index 1285 - 1296
     185,185,185,185,185,185,185,185,186,186,186,186, & ! index 1297 - 1308
     186,186,186,186,186,186,186,186,186,186,186,186, & ! index 1309 - 1320
     187,187,187,187,187,187,187,187,187,187,188,188, & ! index 1321 - 1332
     188,188,188,188,188,188,188,188,189,189,189,189, & ! index 1333 - 1344
     189,189,189,189,189,189,189,190,190,190,190,190, & ! index 1345 - 1356
     190,190,190,190,190,190,190,190,190,190,190,190, & ! index 1357 - 1368
     190,190,190,190,190,190,190,190,190,190,190,190, & ! index 1369 - 1380
     190,190,190,190,190,190,190,190,190,190,190,190, & ! index 1381 - 1392
     190,190,190,190,190,190,190,190,190,190,190,190, & ! index 1393 - 1404
     190,190,190,190,190,190,190,190,190,190,190,191, & ! index 1405 - 1416
     191,191,191,191,191,191,192,192,192,192,192,192, & ! index 1417 - 1428
     192,192,192,192,192,192,192,192,192,192,192,192 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_4 = (/ &
     192,192,192,192,192,192,192,192,192,193,193,193, & ! index 1441 - 1452
     193,193,193,193,193,193,193,193,193,193,194,194, & ! index 1453 - 1464
     194,194,194,194,194,194,194,194,194,194,194,194, & ! index 1465 - 1476
     194,194,194,194,194,194,194,194,194,194,194,194, & ! index 1477 - 1488
     194,194,194,194,194,194,194,194,194,194,194,194, & ! index 1489 - 1500
     194,194,194,194,194,195,195,195,195,195,195,195, & ! index 1501 - 1512
     195,195,195,195,195,196,196,196,196,196,196,196, & ! index 1513 - 1524
     196,196,196,196,196,196,196,196,196,196,196,196, & ! index 1525 - 1536
     196,196,196,197,197,197,197,197,197,197,197,197, & ! index 1537 - 1548
     197,197,197,197,197,198,198,198,198,198,198,198, & ! index 1549 - 1560
     198,199,199,199,199,199,199,199,199,199,199,199, & ! index 1561 - 1572
     199,199,199,199,199,200,200,200,200,200,200,200, & ! index 1573 - 1584
     200,200,200,200,200,200,200,200,200,200,200,200, & ! index 1585 - 1596
     200,200,200,200,200,200,200,200,200,200,200,200, & ! index 1597 - 1608
     200,200,200,200,200,200,200,200,200,200,200,200, & ! index 1609 - 1620
     200,200,200,200,200,200,200,200,200,201,201,201, & ! index 1621 - 1632
     201,201,201,201,201,201,201,201,201,201,201,201, & ! index 1633 - 1644
     202,202,202,202,202,202,202,202,202,202,202,202, & ! index 1645 - 1656
     202,202,202,203,203,203,203,203,203,203,203,203, & ! index 1657 - 1668
     203,203,203,203,204,204,204,204,204,204,204,204, & ! index 1669 - 1680
     204,204,204,204,204,204,204,204,204,204,204,204, & ! index 1681 - 1692
     204,204,205,205,205,205,205,205,205,205,205,205, & ! index 1693 - 1704
     205,205,205,205,206,206,206,206,206,206,206,206, & ! index 1705 - 1716
     206,206,206,206,206,206,206,206,206,206,206,206, & ! index 1717 - 1728
     206,206,206,206,207,207,207,207,207,207,207,207, & ! index 1729 - 1740
     207,207,207,207,207,207,207,207,207,207,207,207, & ! index 1741 - 1752
     207,207,207,208,208,208,208,208,208,208,208,208, & ! index 1753 - 1764
     208,208,208,208,208,208,208,208,208,208,208,208, & ! index 1765 - 1776
     208,208,208,208,208,208,208,208,208,208,208,208, & ! index 1777 - 1788
     208,208,208,208,208,208,208,208,208,208,208,208 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_5 = (/ &
     208,208,208,208,208,208,208,208,208,208,208,209, & ! index 1801 - 1812
     209,209,209,209,209,209,209,209,209,209,209,209, & ! index 1813 - 1824
     209,209,209,209,210,210,210,210,210,210,210,210, & ! index 1825 - 1836
     210,210,210,210,210,210,210,210,210,210,210,210, & ! index 1837 - 1848
     210,210,210,210,210,210,211,211,211,211,211,211, & ! index 1849 - 1860
     211,211,211,211,211,211,211,211,212,212,212,212, & ! index 1861 - 1872
     212,212,212,212,212,212,212,212,212,212,212,212, & ! index 1873 - 1884
     212,212,212,212,212,212,212,212,212,212,212,212, & ! index 1885 - 1896
     212,212,212,212,212,212,212,212,212,212,212,212, & ! index 1897 - 1908
     212,212,212,212,212,212,212,212,212,212,212,212, & ! index 1909 - 1920
     212,212,212,212,212,213,213,213,213,213,213,213, & ! index 1921 - 1932
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 1933 - 1944
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 1945 - 1956
     213,213,213,213,213,213,213,213,213,213,214,214, & ! index 1957 - 1968
     214,214,214,214,214,214,214,214,214,214,214,214, & ! index 1969 - 1980
     214,214,214,214,214,214,214,214,214,214,214,214, & ! index 1981 - 1992
     214,214,214,214,214,214,214,214,214,214,214,214, & ! index 1993 - 2004
     214,214,214,214,214,214,214,214,214,214,214,214, & ! index 2005 - 2016
     214,214,214,214,214,214,214,214,214,214,214,214, & ! index 2017 - 2028
     214,214,214,214,214,214,214,214,214,214,214,214, & ! index 2029 - 2040
     214,214,214,214,214,214,214,214,214,214,214,214, & ! index 2041 - 2052
     214,214,215,215,215,215,215,215,215,215,215,215, & ! index 2053 - 2064
     215,215,215,215,215,215,215,215,215,215,215,215, & ! index 2065 - 2076
     216,216,216,216,216,216,216,216,216,216,216,216, & ! index 2077 - 2088
     216,216,216,216,216,216,216,216,216,216,216,216, & ! index 2089 - 2100
     216,216,216,216,216,216,216,216,216,216,216,216, & ! index 2101 - 2112
     216,216,217,217,217,217,217,217,217,217,217,217, & ! index 2113 - 2124
     217,217,217,217,217,217,217,217,217,217,218,218, & ! index 2125 - 2136
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 2137 - 2148
     218,218,218,218,218,218,218,218,218,218,218,218 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_6 = (/ &
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 2161 - 2172
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 2173 - 2184
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 2185 - 2196
     218,218,219,219,219,219,219,219,219,219,219,219, & ! index 2197 - 2208
     219,219,219,219,219,219,219,219,219,219,219,219, & ! index 2209 - 2220
     219,219,219,219,219,219,219,219,219,220,220,220, & ! index 2221 - 2232
     220,220,220,220,220,220,220,220,220,220,220,220, & ! index 2233 - 2244
     220,220,220,220,220,220,220,220,220,220,220,220, & ! index 2245 - 2256
     220,220,220,220,220,220,220,220,220,220,220,220, & ! index 2257 - 2268
     220,220,220,220,220,220,220,220,220,220,220,220, & ! index 2269 - 2280
     220,220,220,220,220,220,220,220,220,220,220,220, & ! index 2281 - 2292
     220,220,220,220,220,220,220,220,221,221,221,221, & ! index 2293 - 2304
     221,221,221,221,221,221,221,221,221,221,221,221, & ! index 2305 - 2316
     221,221,221,221,221,221,221,221,221,221,221,221, & ! index 2317 - 2328
     221,221,221,221,221,221,221,221,221,221,221,221, & ! index 2329 - 2340
     221,221,221,221,221,221,221,221,221,221,221,221, & ! index 2341 - 2352
     221,221,221,221,221,221,221,221,221,221,221,221, & ! index 2353 - 2364
     221,221,221,221,221,222,222,222,222,222,222,222, & ! index 2365 - 2376
     222,222,222,222,222,222,222,222,222,222,222,222, & ! index 2377 - 2388
     222,222,222,222,222,222,222,222,222,222,222,222, & ! index 2389 - 2400
     222,222,222,222,222,222,222,222,222,222,222,222, & ! index 2401 - 2412
     222,222,222,222,222,222,222,222,222,222,223,223, & ! index 2413 - 2424
     223,223,223,223,223,223,223,223,223,223,223,223, & ! index 2425 - 2436
     223,223,223,223,223,223,223,223,223,223,223,223, & ! index 2437 - 2448
     223,223,223,223,223,223,223,223,223,223,223,223, & ! index 2449 - 2460
     223,223,223,223,223,223,223,223,223,223,223,223, & ! index 2461 - 2472
     223,223,223,223,223,223,223,223,223,223,223,223, & ! index 2473 - 2484
     223,223,223,223,223,223,223,223,223,223,223,223, & ! index 2485 - 2496
     223,223,223,223,223,223,223,223,224,224,224,224, & ! index 2497 - 2508
     224,224,224,224,224,224,224,224,224,224,224,224 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_7 = (/ &
     224,224,224,224,224,224,224,224,224,224,224,224, & ! index 2521 - 2532
     224,224,224,224,224,225,225,225,225,225,225,225, & ! index 2533 - 2544
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2545 - 2556
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2557 - 2568
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2569 - 2580
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2581 - 2592
     225,225,225,225,225,225,226,226,226,226,226,226, & ! index 2593 - 2604
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2605 - 2616
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2617 - 2628
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2629 - 2640
     226,226,227,227,227,227,227,227,227,227,227,227, & ! index 2641 - 2652
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2653 - 2664
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2665 - 2676
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2677 - 2688
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2689 - 2700
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2701 - 2712
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2713 - 2724
     227,227,227,227,227,227,228,228,228,228,228,228, & ! index 2725 - 2736
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 2737 - 2748
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 2749 - 2760
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 2761 - 2772
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 2773 - 2784
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2785 - 2796
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2797 - 2808
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2809 - 2820
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2821 - 2832
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2833 - 2844
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2845 - 2856
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2857 - 2868
     230,230,230,230,230,230,230,230,230,230,230,230 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_8 = (/ &
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 2881 - 2892
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 2893 - 2904
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 2905 - 2916
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 2917 - 2928
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 2929 - 2940
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 2941 - 2952
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 2953 - 2964
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 2965 - 2976
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 2977 - 2988
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 2989 - 3000
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3001 - 3012
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3013 - 3024
     231,231,231,231,231,231,231,232,232,232,232,232, & ! index 3025 - 3036
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3037 - 3048
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3049 - 3060
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3061 - 3072
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3073 - 3084
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3085 - 3096
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3097 - 3108
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3109 - 3120
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3121 - 3132
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3133 - 3144
     232,232,232,232,233,233,233,233,233,233,233,233, & ! index 3145 - 3156
     233,233,233,233,233,233,233,233,233,233,233,233, & ! index 3157 - 3168
     233,233,233,233,233,233,233,233,233,233,233,233, & ! index 3169 - 3180
     233,233,233,233,233,233,233,233,233,233,233,233, & ! index 3181 - 3192
     233,234,234,234,234,234,234,234,234,234,234,234, & ! index 3193 - 3204
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3205 - 3216
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3217 - 3228
     234,234,234,234,234,234,234,234,234,234,234,234 /)
  INTEGER, PARAMETER, DIMENSION(201) :: LU_IROW_9 = (/ &
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3241 - 3252
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3253 - 3264
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3265 - 3276
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3277 - 3288
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3289 - 3300
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3301 - 3312
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3313 - 3324
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3325 - 3336
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3337 - 3348
     234,234,234,234,234,234,234,235,235,235,235,235, & ! index 3349 - 3360
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3361 - 3372
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3373 - 3384
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3385 - 3396
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3397 - 3408
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3409 - 3420
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3421 - 3432
     235,235,235,235,235,235,235,235,235 /)
  INTEGER, PARAMETER, DIMENSION(3441) :: LU_IROW = (/&
    LU_IROW_0, LU_IROW_1, LU_IROW_2, LU_IROW_3, LU_IROW_4, &
    LU_IROW_5, LU_IROW_6, LU_IROW_7, LU_IROW_8, LU_IROW_9 /)

  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_0 = (/ &
       1,  2,  3,  4, 37, 40, 47, 71,  5, 69, 91,107, & ! index 1 - 12
     118,127,131,139,141,145,150,157,166,170,175,191, & ! index 13 - 24
     192,193,194,203,208,218,220,221,223,227,229,231, & ! index 25 - 36
     232,234,  6, 41, 67,  7, 37, 40, 47, 71, 86,111, & ! index 37 - 48
     138,  8, 37, 40, 47, 71, 86,111,138,  9, 10, 10, & ! index 49 - 60
     152,154,167,221,223,229,230,232, 11, 64,232, 12, & ! index 61 - 72
      64,223, 13,174,234, 14,174,229, 15, 63,232, 16, & ! index 73 - 84
      63,223, 17, 18, 18,121,128,129,234, 19, 70,232, & ! index 85 - 96
      20, 70,223, 21, 92,234, 22,159,234, 23,186, 24, & ! index 97 - 108
     186, 25,158, 26, 60, 65, 66, 27, 28, 28,141,234, & ! index 109 - 120
      29,200, 30, 41, 48, 62, 67, 68, 78, 83, 95, 96, & ! index 121 - 132
      97, 99,110,113,116,119,139,140,141,143,145,147, & ! index 133 - 144
     148,149,153,154,155,156,157,159,160,161,162,163, & ! index 145 - 156
     164,166,167,168,169,171,172,173,175,177,179,180, & ! index 157 - 168
     182,183,185,187,188,189,190,193,195,197,199,203, & ! index 169 - 180
     204,205,206,209,218,221,223,227,230,232,234, 31, & ! index 181 - 192
      37, 40, 47, 62, 69, 79, 86, 87, 88, 91, 92, 94, & ! index 193 - 204
      98,104,111,118,122,123,125,132,134,135,137,138, & ! index 205 - 216
     142,143,144,145,148,150,151,152,154,158,159,162, & ! index 217 - 228
     167,174,176,180,181,183,184,186,188,191,196,198, & ! index 229 - 240
     199,200,202,205,207,210,211,212,213,214,215,216, & ! index 241 - 252
     217,221,223,224,225,226,228,229,230,231,232,233, & ! index 253 - 264
     234,235, 32, 69, 75, 77, 93,107,110,112,117,120, & ! index 265 - 276
     127,131,134,135,136,141,142,150,157,158,165,166, & ! index 277 - 288
     167,174,181,189,192,193,200,201,202,203,208,209, & ! index 289 - 300
     211,212,214,215,216,217,218,221,222,223,227,228, & ! index 301 - 312
     229,231,232,234, 33,153,155,156,160,163,172,197, & ! index 313 - 324
     220,234, 34,153,155,156,160,163,172,197,219,234, & ! index 325 - 336
      35,151,226,227,234, 36,134,135,142,153,155,156, & ! index 337 - 348
     160,163,172,197,231,232,234,235, 37, 88, 38,169 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_1 = (/ &
     187,223, 39,110, 40,184, 41,119,148,162, 42,234, & ! index 361 - 372
      43,234, 44,234, 45,226, 46,226, 47, 88,184, 48, & ! index 373 - 384
     145,230, 49,179,230, 50,234, 51,222,230, 52,226, & ! index 385 - 396
      53,226, 54,226, 55,226, 56,226, 57,226, 58,226, & ! index 397 - 408
      59, 86,111,138, 60,129,191,234, 61,178,223, 62, & ! index 409 - 420
      68,226,230, 50, 63,223,232,234, 42, 64,223,232, & ! index 421 - 432
     234, 65,121,128,150,234, 66,121,128,150,234, 38, & ! index 433 - 444
      67,150,159,169,181,187,191,207,223, 68,223,230, & ! index 445 - 456
      69,228,234, 70, 91,223,232,234, 71,178,232,234, & ! index 457 - 468
      72,218,232,234, 73,226,234, 74, 86,111,138,184, & ! index 469 - 480
     233, 75,227,234, 76,141,215,229,230,234, 77,227, & ! index 481 - 492
     234, 78,221,230, 79,233,234, 80,226,234, 81,204, & ! index 493 - 504
     232,234, 82,226,234, 83,132,225,234, 84,226,234, & ! index 505 - 516
      85,226,234, 86,178,230, 87,226,234, 37, 40, 47, & ! index 517 - 528
      88,184,210,223, 89,164,232,234, 90,171,232,234, & ! index 529 - 540
      91,229,234, 92,229,234, 93,227,234, 94,226,234, & ! index 541 - 552
      95,230,232,234, 79, 96,210,221,227,233,234, 86, & ! index 553 - 564
      97,178,223,230,234, 98,184,210,233,234, 99,141, & ! index 565 - 576
     218,230,234,100,167,179,232,234,101,168,232,234, & ! index 577 - 588
     102,161,232,234,103,153,155,156,160,163,172,197, & ! index 589 - 600
     219,234,104,227,229,234,105,180,188,232,234,106, & ! index 601 - 612
     139,140,206,232,234,107,203,234,108,122,125,144, & ! index 613 - 624
     186,196,199,210,224,225,233,109,222,227,234,110, & ! index 625 - 636
     203,223,232,111,147,184,232,234,112,189,232,234, & ! index 637 - 648
     107,113,203,223,232,234,114,195,232,234,115,177, & ! index 649 - 660
     185,232,234,116,122,125,144,186,210,222,224,234, & ! index 661 - 672
     117,157,223,232,234,118,189,218,223,231,234,119, & ! index 673 - 684
     148,162,229,231,234,112,120,189,218,223,232,234, & ! index 685 - 696
     121,203,232,234,122,186,199,224,231,123,169,187, & ! index 697 - 708
     232,234,124,221,227,232,234,125,186,199,224,231 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_2 = (/ &
     126,166,193,215,229,232,234,127,172,209,232,234, & ! index 721 - 732
     235,128,203,232,234,129,203,232,234,130,191,204, & ! index 733 - 744
     221,227,231,234,131,169,191,223,231,232,234,132, & ! index 745 - 756
     225,229,230,235,133,152,154,205,232,234,134,229, & ! index 757 - 768
     231,234,135,229,231,234,136,193,230,231,234,137, & ! index 769 - 780
     222,227,229,234,138,147,178,184,229,230,118,139, & ! index 781 - 792
     189,218,223,231,232,234,140,203,218,223,232, 76, & ! index 793 - 804
     141,167,215,229,230,234,142,229,231,234,143,151, & ! index 805 - 816
     214,224,225,226,227,228,231,232,234,144,210,222, & ! index 817 - 828
     225,230,235, 48,145,181,223,230,232,234,146,161, & ! index 829 - 840
     164,168,171,173,175,180,182,185,188,189,195,203, & ! index 841 - 852
     206,209,221,234, 61, 86,138,147,178,184,223,229, & ! index 853 - 864
     230,234,148,182,183,188,218,221,223,229,232,234, & ! index 865 - 876
      96,149,196,199,210,221,225,226,227,233,234,150, & ! index 877 - 888
     203,223,231,234,151,211,216,226,227,231,234,152, & ! index 889 - 900
     198,221,223,232,234,153,174,219,220,223,230,231, & ! index 901 - 912
     235,154,198,221,223,229,232,155,202,219,220,223, & ! index 913 - 924
     230,231,235,156,211,219,220,223,230,231,235, 60, & ! index 925 - 936
      65, 66,121,128,129,150,157,191,203,223,231,232, & ! index 937 - 948
     234, 39, 42, 50, 91,107,110,113,140,152,154,157, & ! index 949 - 960
     158,189,191,192,198,203,218,221,223,229,231,232, & ! index 961 - 972
     234,150,159,169,187,195,203,223,231,232,234,160, & ! index 973 - 984
     202,215,219,220,223,230,231,235,102,161,211,218, & ! index 985 - 996
     221,223,229,232,234,162,180,182,183,188,218,221, & ! index 997 - 1008
     223,229,231,232,234,163,217,219,220,223,230,231, & ! index 1009 - 1020
     235, 89,109,164,206,207,218,221,222,223,227,232, & ! index 1021 - 1032
     234,102,150,152,154,161,165,166,167,169,191,198, & ! index 1033 - 1044
     203,211,218,221,223,229,231,232,234,166,215,218, & ! index 1045 - 1056
     221,223,229,232,167,198,223,229,230,232,234,101, & ! index 1057 - 1068
     168,211,218,221,222,223,227,232,234,123,169,187 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_3 = (/ &
     191,223,232,234,142,145,150,157,159,169,170,181, & ! index 1081 - 1092
     187,188,191,192,195,197,203,208,223,227,229,230, & ! index 1093 - 1104
     231,232,234,235, 90,109,171,206,207,218,221,222, & ! index 1105 - 1116
     223,227,232,234,172,174,219,220,223,230,231,235, & ! index 1117 - 1128
     123,169,173,187,191,207,218,221,223,232,234,174, & ! index 1129 - 1140
     227,229,231,234,126,166,175,193,215,218,221,223, & ! index 1141 - 1152
     229,232,234,134,135,142,153,155,156,160,163,172, & ! index 1153 - 1164
     174,176,197,202,211,215,217,219,220,223,227,228, & ! index 1165 - 1176
     229,230,231,232,234,235,115,177,185,201,218,221, & ! index 1177 - 1188
     222,223,227,232,234,  1,  2,  3, 40, 44, 59, 61, & ! index 1189 - 1200
      71, 74, 86, 88,111,138,147,178,184,210,223,229, & ! index 1201 - 1212
     230,231,232,233,234, 49,100,167,179,198,212,213, & ! index 1213 - 1224
     217,218,221,223,229,230,232,234,142,180,218,221, & ! index 1225 - 1236
     223,229,231,232,234,150,169,181,187,191,203,209, & ! index 1237 - 1248
     223,231,232,234,134,135,142,182,183,218,221,223, & ! index 1249 - 1260
     229,231,232,234,134,135,142,182,183,218,221,223, & ! index 1261 - 1272
     229,231,232,234, 40, 47, 88,111,138,147,178,184, & ! index 1273 - 1284
     210,223,229,230,231,232,233,234,134,135,142,185, & ! index 1285 - 1296
     213,218,221,223,229,231,232,234,116,122,125,144, & ! index 1297 - 1308
     186,199,210,222,224,225,228,230,231,232,234,235, & ! index 1309 - 1320
     123,150,169,187,191,203,223,231,232,234,134,135, & ! index 1321 - 1332
     188,218,221,223,229,231,232,234,112,128,129,189, & ! index 1333 - 1344
     202,203,218,221,223,232,234, 41, 67, 92,104,119, & ! index 1345 - 1356
     122,125,132,137,138,139,140,144,147,148,150,158, & ! index 1357 - 1368
     159,162,169,175,178,180,181,182,183,184,186,187, & ! index 1369 - 1380
     188,189,190,191,192,193,195,198,199,200,202,203, & ! index 1381 - 1392
     207,209,210,212,213,214,215,216,218,221,222,223, & ! index 1393 - 1404
     224,225,227,228,229,230,231,232,233,234,235,191, & ! index 1405 - 1416
     203,205,221,223,231,234,107,112,114,140,155,157, & ! index 1417 - 1428
     159,169,187,189,191,192,195,198,202,203,205,218 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_4 = (/ &
     219,220,221,223,230,231,232,234,235,126,136,166, & ! index 1441 - 1452
     193,215,218,221,223,229,230,231,232,234,145,156, & ! index 1453 - 1464
     161,164,166,168,171,173,175,177,181,185,187,189, & ! index 1465 - 1476
     191,193,194,195,201,202,203,204,205,206,207,208, & ! index 1477 - 1488
     209,211,213,215,218,219,220,221,222,223,227,229, & ! index 1489 - 1500
     230,231,232,234,235,114,174,195,217,218,221,223, & ! index 1501 - 1512
     227,229,231,232,234, 79, 83, 98,132,149,184,196, & ! index 1513 - 1524
     199,210,221,223,224,225,226,227,229,230,231,232, & ! index 1525 - 1536
     233,234,235,174,197,211,215,217,219,220,223,227, & ! index 1537 - 1548
     229,230,231,234,235,198,205,218,221,223,229,231, & ! index 1549 - 1560
     234,122,125,186,199,210,222,224,225,227,228,230, & ! index 1561 - 1572
     231,232,233,234,235, 39, 50, 91,107,110,112,113, & ! index 1573 - 1584
     114,115,117,140,145,157,159,160,163,165,166,167, & ! index 1585 - 1596
     169,177,181,185,187,189,191,195,198,200,201,202, & ! index 1597 - 1608
     203,205,208,209,211,213,215,217,218,219,220,221, & ! index 1609 - 1620
     222,223,227,229,230,231,232,234,235, 90,171,188, & ! index 1621 - 1632
     201,206,207,218,221,222,223,227,229,231,232,234, & ! index 1633 - 1644
     121,128,129,150,191,202,203,205,218,221,223,229, & ! index 1645 - 1656
     231,232,234,121,128,129,174,203,218,221,223,227, & ! index 1657 - 1668
     229,231,232,234, 81,137,142,179,198,204,205,206, & ! index 1669 - 1680
     207,212,213,217,218,221,222,223,227,229,230,231, & ! index 1681 - 1692
     232,234,133,152,154,174,198,205,218,221,223,227, & ! index 1693 - 1704
     229,231,232,234,104,105,106,139,140,173,180,187, & ! index 1705 - 1716
     188,189,191,202,203,205,206,207,218,221,223,227, & ! index 1717 - 1728
     229,231,232,234,133,152,154,166,173,185,187,191, & ! index 1729 - 1740
     198,203,205,206,207,213,215,218,221,223,227,229, & ! index 1741 - 1752
     231,232,234,101,107,112,119,120,127,136,140,141, & ! index 1753 - 1764
     145,148,155,157,162,167,168,169,172,174,175,177, & ! index 1765 - 1776
     180,181,182,183,185,187,188,189,191,193,198,201, & ! index 1777 - 1788
     202,203,205,206,207,208,209,211,213,215,218,219 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_5 = (/ &
     220,221,222,223,227,229,230,231,232,234,235,127, & ! index 1801 - 1812
     172,174,209,215,218,219,220,221,223,227,229,230, & ! index 1813 - 1824
     231,232,234,235, 45, 46, 58, 73, 80, 94,144,178, & ! index 1825 - 1836
     184,186,199,210,222,223,224,225,226,227,228,229, & ! index 1837 - 1848
     230,231,232,233,234,235,142,174,180,211,217,218, & ! index 1849 - 1860
     221,222,223,227,229,231,232,234, 89,102,105,106, & ! index 1861 - 1872
     123,133,134,135,139,140,146,152,154,161,162,164, & ! index 1873 - 1884
     166,168,169,171,173,175,180,182,183,185,187,188, & ! index 1885 - 1896
     189,191,193,195,198,202,203,205,206,207,209,211, & ! index 1897 - 1908
     212,213,215,217,218,219,220,221,222,223,227,229, & ! index 1909 - 1920
     230,231,232,234,235,105,114,118,120,133,134,135, & ! index 1921 - 1932
     148,152,154,175,180,182,183,185,188,189,193,195, & ! index 1933 - 1944
     198,202,203,205,206,207,209,213,215,217,218,219, & ! index 1945 - 1956
     220,221,223,227,229,230,231,232,234,235, 42, 50, & ! index 1957 - 1968
      78, 91, 92,101,107,114,115,117,121,124,126,127, & ! index 1969 - 1980
     128,129,131,136,141,142,145,150,151,152,154,157, & ! index 1981 - 1992
     158,159,161,164,165,166,167,168,169,171,172,173, & ! index 1993 - 2004
     174,175,177,179,180,181,182,183,185,187,188,189, & ! index 2005 - 2016
     191,192,193,195,197,198,201,202,203,204,205,206, & ! index 2017 - 2028
     207,208,209,211,212,213,214,215,216,217,218,219, & ! index 2029 - 2040
     220,221,222,223,226,227,228,229,230,231,232,233, & ! index 2041 - 2052
     234,235,121,128,129,142,172,174,180,203,205,215, & ! index 2053 - 2064
     218,219,220,221,223,227,229,230,231,232,234,235, & ! index 2065 - 2076
      81,100,101,130,156,161,167,168,173,179,185,187, & ! index 2077 - 2088
     191,198,203,204,205,206,207,211,212,213,215,216, & ! index 2089 - 2100
     217,218,219,220,221,222,223,227,229,230,231,232, & ! index 2101 - 2112
     234,235,121,128,129,153,174,203,205,217,218,219, & ! index 2113 - 2124
     220,221,223,227,229,230,231,232,234,235, 72, 99, & ! index 2125 - 2136
     107,114,115,117,126,136,141,157,159,161,163,164, & ! index 2137 - 2148
     166,167,168,169,171,173,174,175,177,179,180,182 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_6 = (/ &
     183,185,187,188,189,191,193,195,198,200,201,202, & ! index 2161 - 2172
     203,204,205,206,207,208,209,211,212,213,215,216, & ! index 2173 - 2184
     217,218,219,220,221,222,223,227,229,230,231,232, & ! index 2185 - 2196
     234,235, 69, 92,103,153,155,156,160,163,172,174, & ! index 2197 - 2208
     197,202,203,205,211,215,217,218,219,220,221,222, & ! index 2209 - 2220
     223,227,228,229,230,231,232,234,235, 69, 75, 77, & ! index 2221 - 2232
      93,107,110,112,117,120,127,131,134,135,136,141, & ! index 2233 - 2244
     142,150,153,155,156,157,158,160,163,165,166,167, & ! index 2245 - 2256
     169,172,174,181,187,189,191,192,193,195,197,198, & ! index 2257 - 2268
     200,201,202,203,205,206,207,208,209,211,212,213, & ! index 2269 - 2280
     214,215,216,217,218,219,220,221,222,223,226,227, & ! index 2281 - 2292
     228,229,230,231,232,233,234,235, 44, 72, 78, 92, & ! index 2293 - 2304
      93, 94, 99,124,141,151,152,154,161,163,164,165, & ! index 2305 - 2316
     166,167,168,169,171,173,174,175,177,179,180,182, & ! index 2317 - 2328
     183,185,187,188,189,191,193,194,195,198,201,202, & ! index 2329 - 2340
     203,204,205,206,207,208,209,211,212,213,215,216, & ! index 2341 - 2352
     217,218,219,220,221,222,223,226,227,228,229,230, & ! index 2353 - 2364
     231,232,233,234,235,  3, 45, 46, 51, 58, 59, 73, & ! index 2365 - 2376
      80, 86, 94,108,109,111,116,122,125,137,138,144, & ! index 2377 - 2388
     147,178,184,186,196,199,201,206,207,210,211,213, & ! index 2389 - 2400
     214,215,216,217,218,219,220,221,222,223,224,225, & ! index 2401 - 2412
     226,227,228,229,230,231,232,233,234,235, 61, 62, & ! index 2413 - 2424
      63, 64, 68, 70, 88, 91, 97,110,113,139,140,145, & ! index 2425 - 2436
     152,153,154,155,156,157,160,161,163,164,166,167, & ! index 2437 - 2448
     168,169,171,172,173,174,175,177,178,179,180,181, & ! index 2449 - 2460
     182,183,184,185,187,188,189,191,193,195,197,198, & ! index 2461 - 2472
     201,202,203,204,205,206,207,209,210,211,212,213, & ! index 2473 - 2484
     215,217,218,219,220,221,222,223,224,225,226,227, & ! index 2485 - 2496
     228,229,230,231,232,233,234,235,109,137,186,196, & ! index 2497 - 2508
     199,201,206,207,210,211,213,214,215,216,217,218 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_7 = (/ &
     219,220,221,222,223,224,225,226,227,228,229,230, & ! index 2521 - 2532
     231,232,233,234,235, 75, 77, 93,104,109,124,130, & ! index 2533 - 2544
     132,137,144,151,170,174,176,181,186,187,188,191, & ! index 2545 - 2556
     192,194,195,196,197,198,199,201,202,203,204,205, & ! index 2557 - 2568
     206,207,208,209,210,211,212,213,214,215,216,217, & ! index 2569 - 2580
     218,219,220,221,222,223,224,225,226,227,228,229, & ! index 2581 - 2592
     230,231,232,233,234,235, 45, 46, 52, 53, 54, 55, & ! index 2593 - 2604
      56, 57, 58, 62, 68, 73, 80, 82, 84, 85, 87, 94, & ! index 2605 - 2616
     149,151,196,199,210,211,216,217,218,219,220,221, & ! index 2617 - 2628
     222,223,224,225,226,227,228,229,230,231,232,233, & ! index 2629 - 2640
     234,235,  2, 43, 52, 53, 54, 55, 56, 57, 58, 74, & ! index 2641 - 2652
      75, 77, 79, 82, 83, 84, 85, 86, 87, 93, 96,104, & ! index 2653 - 2664
     108,109,111,122,124,125,130,132,137,138,144,147, & ! index 2665 - 2676
     149,151,170,174,176,178,181,184,186,187,188,191, & ! index 2677 - 2688
     192,194,195,196,197,198,199,201,202,203,204,205, & ! index 2689 - 2700
     206,207,208,209,210,211,212,213,214,215,216,217, & ! index 2701 - 2712
     218,219,220,221,222,223,224,225,226,227,228,229, & ! index 2713 - 2724
     230,231,232,233,234,235, 45, 46, 52, 53, 54, 55, & ! index 2725 - 2736
      56, 57, 58, 68, 69, 73, 80, 82, 84, 85, 87, 98, & ! index 2737 - 2748
     143,149,151,176,184,186,196,197,199,202,203,205, & ! index 2749 - 2760
     210,211,214,215,216,217,218,219,220,221,222,223, & ! index 2761 - 2772
     224,225,226,227,228,229,230,231,232,233,234,235, & ! index 2773 - 2784
      78, 91, 92, 95, 99,104,119,132,134,135,136,137, & ! index 2785 - 2796
     138,141,142,144,145,147,148,153,154,155,156,158, & ! index 2797 - 2808
     159,160,162,163,167,169,172,174,178,180,181,182, & ! index 2809 - 2820
     183,184,187,188,189,190,191,192,193,195,197,198, & ! index 2821 - 2832
     199,200,201,202,203,205,206,207,208,209,210,211, & ! index 2833 - 2844
     212,213,214,215,216,217,218,219,220,221,222,223, & ! index 2845 - 2856
     224,225,226,227,228,229,230,231,232,233,234,235, & ! index 2857 - 2868
      48, 49, 51, 68, 76, 78, 83, 86, 88, 95, 97, 99 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_8 = (/ &
     102,110,113,119,123,131,132,133,136,138,139,140, & ! index 2881 - 2892
     141,144,145,147,148,150,152,153,154,155,156,157, & ! index 2893 - 2904
     159,160,161,162,163,164,165,166,167,168,169,171, & ! index 2905 - 2916
     172,173,174,175,177,178,179,180,181,182,183,184, & ! index 2917 - 2928
     185,187,188,189,190,191,192,193,195,197,198,199, & ! index 2929 - 2940
     200,201,202,203,204,205,206,207,208,209,210,211, & ! index 2941 - 2952
     212,213,214,215,216,217,218,219,220,221,222,223, & ! index 2953 - 2964
     224,225,226,227,228,229,230,231,232,233,234,235, & ! index 2965 - 2976
     118,122,125,134,135,136,142,143,150,151,162,167, & ! index 2977 - 2988
     174,178,179,180,182,183,184,186,188,189,191,193, & ! index 2989 - 3000
     198,199,202,203,205,210,211,212,213,214,215,216, & ! index 3001 - 3012
     217,218,219,220,221,222,223,224,225,226,227,228, & ! index 3013 - 3024
     229,230,231,232,233,234,235, 63, 64, 70, 75, 77, & ! index 3025 - 3036
      78, 81, 89, 90, 91, 93, 94, 95,100,101,102,105, & ! index 3037 - 3048
     106,107,110,112,113,114,117,118,120,121,123,124, & ! index 3049 - 3060
     127,128,129,130,131,133,134,135,139,140,141,142, & ! index 3061 - 3072
     143,145,146,150,151,152,154,157,158,161,164,166, & ! index 3073 - 3084
     167,168,169,170,171,172,173,174,175,176,177,178, & ! index 3085 - 3096
     179,180,181,182,183,184,185,187,188,189,191,192, & ! index 3097 - 3108
     193,195,197,198,200,201,202,203,204,205,206,207, & ! index 3109 - 3120
     208,209,210,211,212,213,214,215,216,217,218,219, & ! index 3121 - 3132
     220,221,222,223,224,225,226,227,228,229,230,231, & ! index 3133 - 3144
     232,233,234,235, 52, 53, 54, 55, 56, 57, 58, 79, & ! index 3145 - 3156
      82, 84, 85, 87, 96, 98,149,184,196,199,204,205, & ! index 3157 - 3168
     206,207,210,212,213,215,217,218,219,220,221,222, & ! index 3169 - 3180
     223,224,225,226,227,228,229,230,231,232,233,234, & ! index 3181 - 3192
     235, 39, 43, 44, 60, 65, 66, 69, 71, 72, 73, 75, & ! index 3193 - 3204
      77, 79, 80, 81, 82, 83, 84, 85, 87, 89, 90, 92, & ! index 3205 - 3216
      93, 94, 95, 97, 98,100,101,102,103,104,105,106, & ! index 3217 - 3228
     107,109,110,111,112,113,114,115,116,117,118,119 /)
  INTEGER, PARAMETER, DIMENSION(201) :: LU_ICOL_9 = (/ &
     120,121,122,123,124,125,126,127,128,129,130,131, & ! index 3241 - 3252
     132,133,134,135,136,137,139,140,141,142,143,144, & ! index 3253 - 3264
     145,146,147,148,149,150,151,152,153,154,155,156, & ! index 3265 - 3276
     157,158,159,160,161,162,163,164,165,166,167,168, & ! index 3277 - 3288
     169,170,171,172,173,174,175,176,177,178,179,180, & ! index 3289 - 3300
     181,182,183,184,185,186,187,188,189,190,191,192, & ! index 3301 - 3312
     193,194,195,196,197,198,199,200,201,202,203,204, & ! index 3313 - 3324
     205,206,207,208,209,210,211,212,213,214,215,216, & ! index 3325 - 3336
     217,218,219,220,221,222,223,224,225,226,227,228, & ! index 3337 - 3348
     229,230,231,232,233,234,235, 43, 44, 71, 82, 84, & ! index 3349 - 3360
      85, 87, 93, 94, 95, 97,111,115,121,124,128,129, & ! index 3361 - 3372
     132,137,143,144,147,151,153,155,156,160,163,170, & ! index 3373 - 3384
     172,174,176,177,178,181,184,185,186,187,188,190, & ! index 3385 - 3396
     191,192,193,194,195,196,197,198,199,200,201,202, & ! index 3397 - 3408
     203,204,205,206,207,208,209,210,211,212,213,214, & ! index 3409 - 3420
     215,216,217,218,219,220,221,222,223,224,225,226, & ! index 3421 - 3432
     227,228,229,230,231,232,233,234,235 /)
  INTEGER, PARAMETER, DIMENSION(3441) :: LU_ICOL = (/&
    LU_ICOL_0, LU_ICOL_1, LU_ICOL_2, LU_ICOL_3, LU_ICOL_4, &
    LU_ICOL_5, LU_ICOL_6, LU_ICOL_7, LU_ICOL_8, LU_ICOL_9 /)

  INTEGER, PARAMETER, DIMENSION(236) :: LU_CROW = (/ &
       1,  2,  3,  4,  9, 39, 42, 50, 58, 60, 69, 72, & ! index 1 - 12
      75, 78, 81, 84, 87, 89, 94, 97,100,103,106,108, & ! index 13 - 24
     110,112,116,118,121,123,192,267,317,327,337,342, & ! index 25 - 36
     357,359,363,365,367,371,373,375,377,379,381,384, & ! index 37 - 48
     387,390,392,395,397,399,401,403,405,407,409,413, & ! index 49 - 60
     417,420,424,429,434,439,444,454,457,460,465,469, & ! index 61 - 72
     473,476,482,485,491,494,497,500,503,507,510,514, & ! index 73 - 84
     517,520,523,526,533,537,541,544,547,550,553,557, & ! index 85 - 96
     564,570,575,580,585,589,593,603,607,612,618,621, & ! index 97 - 108
     632,636,640,645,649,655,659,664,673,678,684,690, & ! index 109 - 120
     697,701,706,711,716,721,728,734,738,742,749,756, & ! index 121 - 132
     761,767,771,775,780,785,791,799,804,811,815,826, & ! index 133 - 144
     832,839,857,867,877,888,893,900,906,914,920,928, & ! index 145 - 156
     936,950,974,984,993,1002,1014,1022,1034,1054,1061,1068, & ! index 157 - 168
     1078,1085,1109,1121,1129,1140,1145,1156,1183,1194,1218,1233, & ! index 169 - 180
     1242,1253,1265,1277,1293,1305,1321,1331,1341,1352,1416,1423, & ! index 181 - 192
     1450,1463,1506,1518,1540,1554,1562,1578,1630,1645,1660,1673, & ! index 193 - 204
     1695,1709,1733,1756,1812,1829,1855,1869,1926,1967,2055,2077, & ! index 205 - 216
     2115,2135,2199,2230,2301,2370,2423,2505,2538,2599,2643,2731, & ! index 217 - 228
     2785,2869,2977,3032,3149,3194,3356,3442 /)

  INTEGER, PARAMETER, DIMENSION(236) :: LU_DIAG = (/ &
       1,  2,  3,  4,  9, 39, 42, 50, 58, 60, 69, 72, & ! index 1 - 12
      75, 78, 81, 84, 87, 89, 94, 97,100,103,106,108, & ! index 13 - 24
     110,112,116,118,121,123,192,267,317,327,337,342, & ! index 25 - 36
     357,359,363,365,367,371,373,375,377,379,381,384, & ! index 37 - 48
     387,390,392,395,397,399,401,403,405,407,409,413, & ! index 49 - 60
     417,420,425,430,434,439,445,454,457,460,465,469, & ! index 61 - 72
     473,476,482,485,491,494,497,500,503,507,510,514, & ! index 73 - 84
     517,520,523,529,533,537,541,544,547,550,553,558, & ! index 85 - 96
     565,570,575,580,585,589,593,603,607,612,618,621, & ! index 97 - 108
     632,636,640,645,650,655,659,664,673,678,684,691, & ! index 109 - 120
     697,701,706,711,716,721,728,734,738,742,749,756, & ! index 121 - 132
     761,767,771,775,780,785,792,799,805,811,815,826, & ! index 133 - 144
     833,839,860,867,878,888,893,900,906,914,920,928, & ! index 145 - 156
     943,961,975,984,994,1002,1014,1024,1039,1054,1061,1069, & ! index 157 - 168
     1079,1091,1111,1121,1131,1140,1147,1166,1184,1208,1221,1234, & ! index 169 - 180
     1244,1256,1269,1284,1296,1309,1324,1333,1344,1383,1416,1434, & ! index 181 - 192
     1453,1479,1508,1524,1541,1554,1565,1606,1633,1650,1664,1678, & ! index 193 - 204
     1700,1723,1745,1794,1815,1840,1858,1909,1952,2035,2064,2100, & ! index 205 - 216
     2122,2186,2217,2287,2357,2409,2492,2526,2588,2633,2722,2777, & ! index 217 - 228
     2862,2971,3027,3145,3191,3354,3441,3442 /)


END MODULE gckpp_JacobianSP

